|
42
|
Is it possible to programmatically expand a folder (sample 1)
with AxCascadeFile1 do
begin
BeginUpdate();
Layout := 'Expand0 = "c:\";SelectMode0 = 0';
EndUpdate();
end
|
|
41
|
Can I limit the size of each cascade column, so the user can't resize them outside of the range I give
with AxCascadeFile1 do
begin
BeginUpdate();
HeaderVisible := False;
Mode := EXMILLERLib.CascadeModeEnum.exFixCascadeMode;
ColumnsVisible := EXMILLERLib.FileColumnEnum.exFileColumnName;
MinColumnWidth := 128;
MaxColumnWidth := 256;
EndUpdate();
end
|
|
40
|
How can I define the width of the cascade column
with AxCascadeFile1 do
begin
BeginUpdate();
Mode := EXMILLERLib.CascadeModeEnum.exFixCascadeMode;
DefColumnWidth := 256;
EndUpdate();
end
|
|
39
|
The scroll bars are too large. Can I make them smaller
with AxCascadeFile1 do
begin
BeginUpdate();
ScrollWidth := 4;
ScrollHeight := 4;
EndUpdate();
end
|
|
38
|
How do I enable the scrollbar-extension, as thumb to be shown outside of the control's client area
with AxCascadeFile1 do
begin
BeginUpdate();
set_ScrollPartVisible(EXMILLERLib.ScrollBarEnum.exVScroll,EXMILLERLib.ScrollPartEnum.exExtentThumbPart,True);
set_ScrollPartVisible(EXMILLERLib.ScrollBarEnum.exHScroll,EXMILLERLib.ScrollPartEnum.exExtentThumbPart,True);
set_ScrollPartVisible(EXMILLERLib.ScrollBarEnum.exScroll,EXMILLERLib.ScrollPartEnum.exExtentThumbPart,True);
ScrollWidth := 4;
set_Background(EXMILLERLib.BackgroundPartEnum.exVSBack,$f0f0f0);
set_Background(EXMILLERLib.BackgroundPartEnum.exVSThumb,$808080);
ScrollHeight := 4;
set_Background(EXMILLERLib.BackgroundPartEnum.exHSBack,get_Background(EXMILLERLib.BackgroundPartEnum.exVSBack));
set_Background(EXMILLERLib.BackgroundPartEnum.exHSThumb,get_Background(EXMILLERLib.BackgroundPartEnum.exVSThumb));
set_Background(EXMILLERLib.BackgroundPartEnum.exScrollSizeGrip,get_Background(EXMILLERLib.BackgroundPartEnum.exVSBack));
EndUpdate();
BeginUpdate();
ColumnsVisible := EXMILLERLib.FileColumnEnum.exFileColumnName;
HeaderVisible := False;
FitCascadeColumns := 3;
EndUpdate();
end
|
|
37
|
How can I lock / freeze the control events
// Event event - Notifies the application once the control fires an event.
procedure TWinForm1.AxCascadeFile1_Event(sender: System.Object; e: AxEXMILLERLib._ICascadeFileEvents_EventEvent);
begin
with AxCascadeFile1 do
begin
OutputDebugString( get_EventParam(-2) );
end
end;
with AxCascadeFile1 do
begin
FreezeEvents(True);
end
|
|
36
|
How can I display the list mode in the first view, and thumbnail in the second view
with AxCascadeFile1 do
begin
BeginUpdate();
AllowSplitView := EXMILLERLib.AllowSplitViewEnum.exAllowOneSplitView;
SplitViewHeight := '256';
Layout := 'Select1="c:\";SelectMode1 = 2';
Layout := 'Select0="c:\";SelectMode0 = 1';
EndUpdate();
end
|
|
35
|
How can I programmatically select a different folder in the second, or third view
with AxCascadeFile1 do
begin
BeginUpdate();
AllowSplitView := EXMILLERLib.AllowSplitViewEnum.exAllowOneSplitView;
SplitViewHeight := '256';
Layout := 'Select1="d:\"';
Layout := 'Select0="E:\"';
EndUpdate();
end
|
|
34
|
How can I programmatically vertically-split the control
with AxCascadeFile1 do
begin
BeginUpdate();
AllowSplitView := EXMILLERLib.AllowSplitViewEnum.exAllowTwoSplitView;
SplitViewHeight := '256,256';
EndUpdate();
end
|
|
33
|
How can I find if the control is running in DPI mode
with AxCascadeFile1 do
begin
OutputDebugString( FormatABC('dpi = 1 ? `normal/stretch mode` : `dpi mode`',Nil,Nil,Nil) );
end
|
|
32
|
How can I change the visual appearance of the +/- buttons, open/close glyphs as current visual theme
with AxCascadeFile1 do
begin
BeginUpdate();
with VisualAppearance do
begin
Add(1,'XP:TREEVIEW 2 1');
Add(2,'XP:TREEVIEW 2 2');
end;
set_Background(EXMILLERLib.BackgroundPartEnum.exTreeGlyphOpen,$1000000);
set_Background(EXMILLERLib.BackgroundPartEnum.exTreeGlyphClose,$2000000);
EndUpdate();
end
|
|
31
|
How can I change the visual appearance of the +/- buttons
with AxCascadeFile1 do
begin
BeginUpdate();
with VisualAppearance do
begin
Add(1,'gBFLBCJwBAEHhEJAAEhABDwCg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQSB' +
'cQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+OpfD' +
'xXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4l' +
'lWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJegef4zluaJ3nqPJeCYH4BAeX5TDLBpVGqKRRnwf4flefZtHsX54BYAR/F+EwVnUd5eAMMJKDIChygyIQpAoEh4iIJ5JlgX' +
'IcgCXpIGoFwnGEQh6BEKBgmMIICHgIJCAiUAzgyUoAhwJohkiRgygwYpiGoKwzGIcgKCkNQNCMRIbCYCRYk4QoMiOchWDwNBjhiJJaDYTRiGiFwlCQAhOE8JBJHITIRg' +
'wZRZFCFCZBkOIUhKTRpCWAwgGYQ4El4NxlBifIWCcCYCFoaoMGaKYyG6GxlBmGJdhkCAWBIeA5g4U4QhMJAImkPIShRVxGgQJRlCIUISh+SJpnCZIeBgFgiHgO4OlOMI' +
'NCISByECDQikkGhuh2JwpmqBogCKaYiC6FwhmkQ4yHgYgYiaHopiuaRakCbIsisSpGjYOwaHYKYMCkK5CA2IxrCwCwFigaJrkLTI6lcdANAEgIA=');
Add(2,'gBFLBCJwBAEHhEJAAEhABEICg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJ5BhIAAyDSJMjSRJUEhqGCWYDleYYYAKHIMQLJQKQSB' +
'cQR9EaBZBAWTpQC0OJDTJRI4TNAgbSYAAYRqoCb6loTKypaxjCQQIgkUBpGKdBynEYsDwSGyJCCJWyIbpKAwoVbcs4AYhuJpaQi+d5PFbjVT8dLAMBwLA8EwXAJ+OpfD' +
'xXU7eFKpR5fchXTI8UxXFqXZhkeQrfh7KYVRBKdBQRBEFQPJqnahqOpaXo2RoLUJKcQwHTmHYNQTALyuTALZrWeZ3XrgN74LbtZzVQauYRpbCMEr6bpoWLnFi6Ho1U4l' +
'lWah1jqSweFqfxPgQQRphi+Yak0YIuqUfJeg8X4rluaZ3niGB+AQHx/EyShjjEVYqiUR5rnmex/GAB5+AIf4gEeXJFHyXZ3gCTAygyAociMKBKEKBIeCiCZyHYFAnCEe' +
'Bkh+BghFgRIegOCgYCySAgh4CAkgINAMmMNIgCcCYjn4LoLmMCJGDKC5ijIagoDMYhCAoJg1A0IxEhsJgJFiThChCY5yFYPA0GOGIYloNhNGIaIXCUJACE4TwkEkchOF' +
'SFYlFkXhUCUCQZEYTglCSMxaEkYJIBmFJhDeDZZEYPwlgmQhghaGqVDoa4bGaeY6FGGZNlmFIBGEJ4jhiZQ5AkMhAg6E5JCkRoGCUSQ6B6CYiSCBIOh+DhJmmARiWQOJ' +
'tDsCJSCSBwkXSLIRicaZ6HqIIomoIguhwIpphIHoWDsJ4mCGChpmqOpGheLIOkqUo2iya4DjGJxihiQoSj4IJaDaMpCjCWoGg6PgpBiQ4tHcQJQBAgI=');
end;
set_Background(EXMILLERLib.BackgroundPartEnum.exTreeGlyphOpen,$1000000);
set_Background(EXMILLERLib.BackgroundPartEnum.exTreeGlyphClose,$2000000);
EndUpdate();
end
|
|
30
|
How can I change the color for selected thumbnail
with AxCascadeFile1 do
begin
BeginUpdate();
Select := 'c:\';
SelectMode := EXMILLERLib.SelectModeEnum.exSelectModeThumbnail;
set_Background(EXMILLERLib.BackgroundPartEnum.exThumbnailSelBorderColor,$ff);
set_Background(EXMILLERLib.BackgroundPartEnum.exThumbnailSelBorderColorHide,$80);
EndUpdate();
end
|
|
29
|
How can I change the thumbnail's frame color
with AxCascadeFile1 do
begin
BeginUpdate();
Select := 'c:\';
SelectMode := EXMILLERLib.SelectModeEnum.exSelectModeThumbnail;
set_Background(EXMILLERLib.BackgroundPartEnum.exThumbnailBorderColor,$10000);
EndUpdate();
end
|
|
28
|
Turn on the background-alternate colors, for Thumbnail view
with AxCascadeFile1 do
begin
BeginUpdate();
Select := 'c:\';
SelectMode := EXMILLERLib.SelectModeEnum.exSelectModeThumbnail;
set_Background(EXMILLERLib.BackgroundPartEnum.exThumbnailBackColorAlt,$808080);
EndUpdate();
end
|
|
27
|
Is there any option I can highlight the panel view that currently has the focus
with AxCascadeFile1 do
begin
BeginUpdate();
set_Background(EXMILLERLib.BackgroundPartEnum.exFocusFrame,$808080);
EndUpdate();
end
|
|
26
|
I disabled the split bars, the question is how can I change the visual appearance of them
with AxCascadeFile1 do
begin
BeginUpdate();
set_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar,$808080);
set_Background(EXMILLERLib.BackgroundPartEnum.exDisableSplitBar,get_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar));
set_Background(EXMILLERLib.BackgroundPartEnum.exCSplitBar,get_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar));
set_Background(EXMILLERLib.BackgroundPartEnum.exHSplitBar,get_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar));
set_Background(EXMILLERLib.BackgroundPartEnum.exSplitBarSize,$2);
set_Background(EXMILLERLib.BackgroundPartEnum.exDisableSplitBarSize,get_Background(EXMILLERLib.BackgroundPartEnum.exSplitBarSize));
HeaderVisible := False;
Mode := Integer(EXMILLERLib.CascadeModeEnum.exAutoFitOnResizeClient) Or Integer(EXMILLERLib.CascadeModeEnum.exDisableResizeCascadeColumns) Or Integer(EXMILLERLib.CascadeModeEnum.exSplitFixCascadeMode);
EndUpdate();
end
|
|
25
|
The control's split bar looks a bit larger, can I make it smaller
with AxCascadeFile1 do
begin
BeginUpdate();
VisualAppearance.Add(1,'gBFLBCJwBAEHhEJAAEhABNACg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASVA' +
'ceAAGaUZrjSgobjmOYhAJCKJUWAFFoVDCgZThGgJHomMIhBDHASQTQ8EytJqmKajCaRSDUJZkWZOIyjBd6a5tVbXEaVTAccxhOKeahvGo5Fred40TRINCWHI1d4NH69J' +
'bwMILSgME6FABXdhWFC+Ex9Kiea7kOqIJwyA5bY5kGRWDRkLzROAALJ1Cz7KqydpDYyAGbABagAYfPy8JzxHKNarfA5GZzuG4zdi8U41WCBdpnHQNS4KL6ndBbWrdFoi' +
'C8X4QnAOQ8B4dwiHQCIEhQDQmDOIZUmQZYDkIVRSmIEQ3lUGwbEIRQQh4ZpeEQGIMB0JZdkoc4XnqVB/k0CAGAKAJgEgFgGgGYBXnyVA5mCRQ4maA5NjgRJvgSTwoFYF' +
'oFmGCBmBqBphhgTJvDcIkFlWCJhmOLgmDoYoIiYKoKmKSI2C6CwiGOLJwgyTJ4lYAg8mOCI+DqDpjkiMJ0g+TJZAYN4OGOWQWEaCpjnOUhBDMZAzk4MYTmUCRGFKFJlE' +
'kRhJhKZJTjIWoWmWSR2F6F5mAmBhbhWZAoASdYZk6WYmGqGpmkmNhuhulQonaHJlgmGhnDuJ4JmYeoemeSZ2H6H5nhmTJ2h0TQKAoHohmiCgmgqIpokoJJ3iOaBKDydw' +
'8GkShWhaJZpgoZoaiaaRTmKHokGieJiiKKJqEqFomimaoKg6Hg+CgSouimK5rAqRg4D4axKjaHoSGuCpmjqLprkqdo6i0D4aBKQIgiwSwWkaMZsgsJpGD6LJLAqNIyi0' +
'CxGlKHJskOahLgKJhzlaK4gi2GxOl6MZtjmTJOjiX5ThSWo5mMM5CkCOpukuNpujubwLiYEY8k2NQ4mqPZNhuZgIj6b5LnaeQ2GXsJrGuQAEAQgI');
AllowSplitView := EXMILLERLib.AllowSplitViewEnum.exAllowTwoSplitView;
set_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar,$1000000);
set_Background(EXMILLERLib.BackgroundPartEnum.exCSplitBar,$1000000);
set_Background(EXMILLERLib.BackgroundPartEnum.exHSplitBar,$1000000);
set_Background(EXMILLERLib.BackgroundPartEnum.exSplitBarSize,$3);
HeaderVisible := False;
EndUpdate();
end
|
|
24
|
How can I change the status bar's visual appearance
with AxCascadeFile1 do
begin
BeginUpdate();
VisualAppearance.Add(1,'gBFLBCJwBAEHhEJAAEhABNACg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASVA' +
'ceAAGaUZrjSgobjmOYhAJCKJUWAFFoVDCgZThGgJHomMIhBDHASQTQ8EytJqmKajCaRSDUJZkWZOIyjBd6a5tVbXEaVTAccxhOKeahvGo5Fred40TRINCWHI1d4NH69J' +
'bwMILSgME6FABXdhWFC+Ex9Kiea7kOqIJwyA5bY5kGRWDRkLzROAALJ1Cz7KqydpDYyAGbABagAYfPy8JzxHKNarfA5GZzuG4zdi8U41WCBdpnHQNS4KL6ndBbWrdFoi' +
'C8X4QnAOQ8B4dwiHQCIEhQDQmDOIZUmQZYDkIVRSmIEQ3lUGwbEIRQQh4ZpeEQGIMB0JZdkoc4XnqVB/k0CAGAKAJgEgFgGgGYBXnyVA5mCRQ4maA5NjgRJvgSTwoFYF' +
'oFmGCBmBqBphhgTJvDcIkFlWCJhmOLgmDoYoIiYKoKmKSI2C6CwiGOLJwgyTJ4lYAg8mOCI+DqDpjkiMJ0g+TJZAYN4OGOWQWEaCpjnOUhBDMZAzk4MYTmUCRGFKFJlE' +
'kRhJhKZJTjIWoWmWSR2F6F5mAmBhbhWZAoASdYZk6WYmGqGpmkmNhuhulQonaHJlgmGhnDuJ4JmYeoemeSZ2H6H5nhmTJ2h0TQKAoHohmiCgmgqIpokoJJ3iOaBKDydw' +
'8GkShWhaJZpgoZoaiaaRTmKHokGieJiiKKJqEqFomimaoKg6Hg+CgSouimK5rAqRg4D4axKjaHoSGuCpmjqLprkqdo6i0D4aBKQIgiwSwWkaMZsgsJpGD6LJLAqNIyi0' +
'CxGlKHJskOahLgKJhzlaK4gi2GxOl6MZtjmTJOjiX5ThSWo5mMM5CkCOpukuNpujubwLiYEY8k2NQ4mqPZNhuZgIj6b5LnaeQ2GXsJrGuQAEAQgI');
StatusBarVisible := EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop;
set_Background(EXMILLERLib.BackgroundPartEnum.exStatusBackColor,$1404040);
set_Background(EXMILLERLib.BackgroundPartEnum.exStatusForeColor,$ffffff);
set_Background(EXMILLERLib.BackgroundPartEnum.exStatusPanelBackColor,$1808080);
EndUpdate();
end
|
|
23
|
How can I change the status bar's visual appearance
with AxCascadeFile1 do
begin
BeginUpdate();
StatusBarVisible := EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop;
set_Background(EXMILLERLib.BackgroundPartEnum.exStatusBackColor,$282828);
set_Background(EXMILLERLib.BackgroundPartEnum.exStatusForeColor,$ffffff);
set_Background(EXMILLERLib.BackgroundPartEnum.exStatusPanelBackColor,$808080);
EndUpdate();
end
|
|
22
|
How can I change the visual appearance for all split-bars that the control displays
with AxCascadeFile1 do
begin
BeginUpdate();
VisualAppearance.Add(1,'gBFLBCJwBAEHhEJAAEhABNACg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIZQ7BKNIxjSJwFiCCQwSDKEjyCKcGRHF6MI6gOYpCgOIYjRJNIASVA' +
'ceAAGaUZrjSgobjmOYhAJCKJUWAFFoVDCgZThGgJHomMIhBDHASQTQ8EytJqmKajCaRSDUJZkWZOIyjBd6a5tVbXEaVTAccxhOKeahvGo5Fred40TRINCWHI1d4NH69J' +
'bwMILSgME6FABXdhWFC+Ex9Kiea7kOqIJwyA5bY5kGRWDRkLzROAALJ1Cz7KqydpDYyAGbABagAYfPy8JzxHKNarfA5GZzuG4zdi8U41WCBdpnHQNS4KL6ndBbWrdFoi' +
'C8X4QnAOQ8B4dwiHQCIEhQDQmDOIZUmQZYDkIVRSmIEQ3lUGwbEIRQQh4ZpeEQGIMB0JZdkoc4XnqVB/k0CAGAKAJgEgFgGgGYBXnyVA5mCRQ4maA5NjgRJvgSTwoFYF' +
'oFmGCBmBqBphhgTJvDcIkFlWCJhmOLgmDoYoIiYKoKmKSI2C6CwiGOLJwgyTJ4lYAg8mOCI+DqDpjkiMJ0g+TJZAYN4OGOWQWEaCpjnOUhBDMZAzk4MYTmUCRGFKFJlE' +
'kRhJhKZJTjIWoWmWSR2F6F5mAmBhbhWZAoASdYZk6WYmGqGpmkmNhuhulQonaHJlgmGhnDuJ4JmYeoemeSZ2H6H5nhmTJ2h0TQKAoHohmiCgmgqIpokoJJ3iOaBKDydw' +
'8GkShWhaJZpgoZoaiaaRTmKHokGieJiiKKJqEqFomimaoKg6Hg+CgSouimK5rAqRg4D4axKjaHoSGuCpmjqLprkqdo6i0D4aBKQIgiwSwWkaMZsgsJpGD6LJLAqNIyi0' +
'CxGlKHJskOahLgKJhzlaK4gi2GxOl6MZtjmTJOjiX5ThSWo5mMM5CkCOpukuNpujubwLiYEY8k2NQ4mqPZNhuZgIj6b5LnaeQ2GXsJrGuQAEAQgI');
AllowSplitView := EXMILLERLib.AllowSplitViewEnum.exAllowTwoSplitView;
set_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar,$1000000);
set_Background(EXMILLERLib.BackgroundPartEnum.exCSplitBar,$1000000);
set_Background(EXMILLERLib.BackgroundPartEnum.exHSplitBar,$1000000);
HeaderVisible := False;
EndUpdate();
end
|
|
21
|
How can I change the visual appearance for all split-bars that the control displays
with AxCascadeFile1 do
begin
BeginUpdate();
AllowSplitView := EXMILLERLib.AllowSplitViewEnum.exAllowTwoSplitView;
set_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar,$10000);
set_Background(EXMILLERLib.BackgroundPartEnum.exCSplitBar,$10000);
set_Background(EXMILLERLib.BackgroundPartEnum.exHSplitBar,$10000);
HeaderVisible := False;
EndUpdate();
end
|
|
20
|
How can I change the tooltip's visual appearance
// MouseMove event - Occurs when the user moves the mouse.
procedure TWinForm1.AxCascadeFile1_MouseMoveEvent(sender: System.Object; e: AxEXMILLERLib._ICascadeFileEvents_MouseMoveEvent);
begin
with AxCascadeFile1 do
begin
ShowToolTip('This is a bit of <b>HTML<b> text to be shown when the cursor hovers the control.',Nil,Nil,Nil,Nil);
end
end;
with AxCascadeFile1 do
begin
BeginUpdate();
VisualAppearance.Add(1,'gBFLBCJwBAEHhEJAAEhABEgDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIHQSDSEYyjGLIXAWCYSAAMIyDKAUEhyGCUBileQhVgyJI3RgMUIzVA' +
'cRRFEiUJQlIZZCgeCZETrPcaUVDcTQHJyRYDlWA3NBwJAAVTVcT0FJdCxEGiRBiqOZ5CAqHIeU7IMI2HTNMStDCYRpEW4bTocMJ1QKNNzyRIkRShC6zLRnDAwApyLIuT' +
'BOcx0Pb+CQ5HgAMgnbA6Bg2XYNTRYNKRRjYKwTKCQJ5tOCbNq2W6WUhBFb2DYdewTQIAM6gO0cQyiAC2Lb0aR5brKdIoXpeAAcDblF4/BLZAA2DZsOhzBpjYreNBRBhu' +
'C+G4oFQOQ8liXw/BEX5pg4dY8GgHpCiGNJtHadJwDGFp7HuQpiF2OBRHsHZ7g+ZJkHofB7HARAkiAaQYkcQZUHIGRUGQDIuE2BAhDYBxGkMZAkCgRxRnWKAYEYB4Elma' +
'QJAGQ42BgOxPCgdJMgeS7/CKCJiEiCJDgmThYiSfoKmGNAOBsOYjAMEgyDcYxDi4NoNmOCJmDoMhjkMYg+D8ZAEAyd4QkwWQUmqEZOmkJhKhKZJJDYSg8mUAwiFIOZlE' +
'QDJVhWTR5GSb4WmSaR2F6FpOniJJlDGJhEA4MgxA4OYknGGpPAmNhuhulRGHKGxLjmVQDC+J4DiYeg8GGWYuH6H5oAoBoCgcTwimaBodmeGZongPRPCoCoOiOZ5qBIIo' +
'iAuaZomkPoPGOToEiaaZKHaHYfiUA5OhMAAngoVh6iYKYqHqKoqmGWoGiOKRkHOKJ7D2TxKgaNotmuCpmFAPQrkqPh4iwaw6laOowmwOpwnSL4LmiXJ9D4TxbBqTozm0' +
'CxGjwPRtEsIJsjWT4Dlydo1C2Sx2l6N5uAOWpijIDpbhYQ42i4K4mmqOpukuMpnjIJIjmKco5m8S5WnaPZkDuSJ4h0S46FKcY8m+DAHAGPovkoUhgD4cILmsCpCnCTA2' +
'nKQgPhwFokh4JpjmsFpEDGDBnBqRpwgwWJ6kSKhZjie5FnGTIXCWR4yAmYh+D+D48g8HpLnMDJHDIPoylObwpWIY5/CyTJzkydw1kSIhzA6ZQ7E+fJrDWUZ0g0JxKksT' +
'5NDSPJTmUaRcmAN5Nn0FJ/lMdYNGcWpWnWHRaGAMZ2AQDoEDKNhLicVpViQDYnGqWpPl2HxFDQNwJgoLoGGaCcDInRdjMCuNYbovR2D2FyNgNIcAJC5FWKwNwcBqAzCW' +
'BoPgTA8BkEwFwN4HRjjyAMH8EgcQ5CaGIFoAAHQ3AoAAIAQBAQ==');
set_Background(EXMILLERLib.BackgroundPartEnum.exToolTipAppearance,$1000000);
EndUpdate();
end
|
|
19
|
How can I change the tooltip's visual appearance
// MouseMove event - Occurs when the user moves the mouse.
procedure TWinForm1.AxCascadeFile1_MouseMoveEvent(sender: System.Object; e: AxEXMILLERLib._ICascadeFileEvents_MouseMoveEvent);
begin
with AxCascadeFile1 do
begin
ShowToolTip('This is a bit of <b>HTML<b> text to be shown when the cursor hovers the control.',Nil,Nil,Nil,Nil);
end
end;
with AxCascadeFile1 do
begin
BeginUpdate();
set_Background(EXMILLERLib.BackgroundPartEnum.exToolTipBackColor,$10000);
set_Background(EXMILLERLib.BackgroundPartEnum.exToolTipForeColor,$ffff);
EndUpdate();
end
|
|
18
|
How can I change the visual appearance of the control's split bar
with AxCascadeFile1 do
begin
BeginUpdate();
VisualAppearance.Add(1,'gBFLBCJwBAEHhEJAAEhABEgDg6AADACAxRDgMQBQKAAzAJBIYhiG4cYCgMZhXDOCYXABCEYRXBIHQSDSEYyjGLIXAWCYSAAMIyDKAUEhyGCUBileQhVgyJI3RgMUIzVA' +
'cRRFEiUJQlIZZCgeCZETrPcaUVDcTQHJyRYDlWA3NBwJAAVTVcT0FJdCxEGiRBiqOZ5CAqHIeU7IMI2HTNMStDCYRpEW4bTocMJ1QKNNzyRIkRShC6zLRnDAwApyLIuT' +
'BOcx0Pb+CQ5HgAMgnbA6Bg2XYNTRYNKRRjYKwTKCQJ5tOCbNq2W6WUhBFb2DYdewTQIAM6gO0cQyiAC2Lb0aR5brKdIoXpeAAcDblF4/BLZAA2DZsOhzBpjYreNBRBhu' +
'C+G4oFQOQ8liXw/BEX5pg4dY8GgHpCiGNJtHadJwDGFp7HuQpiF2OBRHsHZ7g+ZJkHofB7HARAkiAaQYkcQZUHIGRUGQDIuE2BAhDYBxGkMZAkCgRxRnWKAYEYB4Elma' +
'QJAGQ42BgOxPCgdJMgeS7/CKCJiEiCJDgmThYiSfoKmGNAOBsOYjAMEgyDcYxDi4NoNmOCJmDoMhjkMYg+D8ZAEAyd4QkwWQUmqEZOmkJhKhKZJJDYSg8mUAwiFIOZlE' +
'QDJVhWTR5GSb4WmSaR2F6FpOniJJlDGJhEA4MgxA4OYknGGpPAmNhuhulRGHKGxLjmVQDC+J4DiYeg8GGWYuH6H5oAoBoCgcTwimaBodmeGZongPRPCoCoOiOZ5qBIIo' +
'iAuaZomkPoPGOToEiaaZKHaHYfiUA5OhMAAngoVh6iYKYqHqKoqmGWoGiOKRkHOKJ7D2TxKgaNotmuCpmFAPQrkqPh4iwaw6laOowmwOpwnSL4LmiXJ9D4TxbBqTozm0' +
'CxGjwPRtEsIJsjWT4Dlydo1C2Sx2l6N5uAOWpijIDpbhYQ42i4K4mmqOpukuMpnjIJIjmKco5m8S5WnaPZkDuSJ4h0S46FKcY8m+DAHAGPovkoUhgD4cILmsCpCnCTA2' +
'nKQgPhwFokh4JpjmsFpEDGDBnBqRpwgwWJ6kSKhZjie5FnGTIXCWR4yAmYh+D+D48g8HpLnMDJHDIPoylObwpWIY5/CyTJzkydw1kSIhzA6ZQ7E+fJrDWUZ0g0JxKksT' +
'5NDSPJTmUaRcmAN5Nn0FJ/lMdYNGcWpWnWHRaGAMZ2AQDoEDKNhLicVpViQDYnGqWpPl2HxFDQNwJgoLoGGaCcDInRdjMCuNYbovR2D2FyNgNIcAJC5FWKwNwcBqAzCW' +
'BoPgTA8BkEwFwN4HRjjyAMH8EgcQ5CaGIFoAAHQ3AoAAIAQBAQ==');
set_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar,$1000000);
HeaderVisible := False;
Mode := EXMILLERLib.CascadeModeEnum.exFixCascadeMode;
EndUpdate();
end
|
|
17
|
How can I change the visual appearance of the control's split bar
with AxCascadeFile1 do
begin
BeginUpdate();
set_Background(EXMILLERLib.BackgroundPartEnum.exSplitBar,$f0f0f0);
HeaderVisible := False;
Mode := EXMILLERLib.CascadeModeEnum.exFixCascadeMode;
EndUpdate();
end
|
|
16
|
How can I load images into the control
with AxCascadeFile1 do
begin
set_HTMLPicture('pic1','c:\exontrol\images\zipdisk.gif');
StatusBarVisible := EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop;
StatusBarLabel := '<img>pic1</img> This is picture into the control''s status bar';
end
|
|
15
|
Is it possible to show my tooltip
// MouseMove event - Occurs when the user moves the mouse.
procedure TWinForm1.AxCascadeFile1_MouseMoveEvent(sender: System.Object; e: AxEXMILLERLib._ICascadeFileEvents_MouseMoveEvent);
begin
with AxCascadeFile1 do
begin
ShowToolTip('This is a bit of <b>HTML<b> text to be shown when the cursor hovers the control.',Nil,Nil,Nil,Nil);
end
end;
|
|
14
|
Is it possible to change the tooltip's font
with AxCascadeFile1 do
begin
f := (ComObj.CreateComObject(ComObj.ProgIDToClassID('StdFont')) as stdole.StdFont);
with f do
begin
Name := 'Tahoma';
Size := 12;
end;
ToolTipFont := (f as stdole.StdFont);
end
|
|
13
|
Is it possible to change the tooltip's width
with AxCascadeFile1 do
begin
ToolTipWidth := 64;
end
|
|
12
|
How can I disable the control
with AxCascadeFile1 do
begin
Enabled := False;
end
|
|
11
|
How can I force refreshing the control
with AxCascadeFile1 do
begin
BeginUpdate();
Refresh();
EndUpdate();
end
|
|
10
|
How can I prevent showing any tooltip
with AxCascadeFile1 do
begin
ToolTipDelay := 0;
ToolTipPopDelay := 0;
end
|
|
9
|
How can I make the control's tooltip to be shown for a longer time
with AxCascadeFile1 do
begin
ToolTipPopDelay := 10000;
end
|
|
8
|
How can I make the control's tooltip to be shown faster
with AxCascadeFile1 do
begin
ToolTipDelay := 1;
end
|
|
7
|
How can I get the control's handle
with AxCascadeFile1 do
begin
OutputDebugString( hWnd );
end
|
|
6
|
How can I clears the images into the control
with AxCascadeFile1 do
begin
Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' +
'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' +
'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' +
'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
StatusBarVisible := EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop;
StatusBarLabel := '<img>1</img> This is an icon into the control''s status bar';
ReplaceIcon(TObject(0),TObject(-1));
end
|
|
5
|
How can I load images into the control
with AxCascadeFile1 do
begin
Images('gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTql' +
'Vq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m0' +
'ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/yN' +
'AOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA=');
StatusBarVisible := EXMILLERLib.StatusBarAnchorEnum.exStatusBarAnchorTop;
StatusBarLabel := '<img>1</img> This is an icon into the control''s status bar';
end
|
|
4
|
How do I get the version of the control I am running
with AxCascadeFile1 do
begin
OutputDebugString( Version );
end
|
|
3
|
The control's foreground is changed if I open multiple views. What can be the problem
with AxCascadeFile1 do
begin
ForeColor := Color.FromArgb(255,0,0);
ForeColorAlternate := ForeColor;
end
|
|
2
|
The control's background is changed if I open multiple views. What can be the problem
with AxCascadeFile1 do
begin
BackColor := Color.FromArgb(255,255,0);
BackColorAlternate := BackColor;
end
|
|
1
|
How do I change the control's background color
with AxCascadeFile1 do
begin
BackColor := Color.FromArgb(240,240,240);
BackColorAlternate := BackColor;
HeaderVisible := False;
end
|